'From Pharo1.3 of 16 June 2011 [Latest update: #13307] on 14 December 2011 at 3:35:07 pm'!Direcao subclass: #DirecaoVerticalCima	instanceVariableNames: ''	classVariableNames: ''	poolDictionaries: ''	category: 'Batalha-Naval-Inteligencia'!!DirecaoVerticalCima methodsFor: 'calcula' stamp: 'Galera 12/14/2011 15:35'!posicoesNecessariasParaEmbarcacaoTamanho: embarcacaoTamanho posicaoInicial: posicaoInicial	self posicoesNecessarias add: posicaoInicial.		1 to: (embarcacaoTamanho - 1) do: [ : posicaoY |		self posicoesNecessarias add: (posicaoInicial - (0@posicaoY))	].	^ self posicoesNecessarias.! !!DirecaoVerticalCima methodsFor: 'acessing' stamp: 'menega 12/14/2011 09:37'!simbolo	^ #VerticalCima! !